home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 25 / 64er_Magazin_Sonderheft_25_19xx_Markt__Technik_de.d64 / listing 15 (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1990-01-01  |  189 b   |  10 lines
  1. 100 rem erzeugt &-file, das listing 2
  2. 110 rem (led-test) entspricht.
  3. 120 :
  4. 130 data 0,7,12,173,0,28,41,16,74,141
  5. 140 data 0,28,76,0,7,93
  6. 150 open1,8,2,"&,u,w"
  7. 160 forx=1to16:reada
  8. 170 print#1,chr$(a);:nextx
  9. 180 close1
  10.